#ifndef __M_MATCHER_H__
#define __M_MATCHER_H__

#include "util.hpp"
#include "online.hpp"
#include "db.hpp"
#include "room.hpp"
#include <list>
#include <mutex>
#include <condition_variable>

template <class T>
class match_queue
{
private:
    // 用链表而不是queue是因为有中间删除数据的需求
    std::list<T> _list;
    // 实现线程安全
    std::mutex _mutex;
    std::condition_variable _cond; // 给消费者用的条件变量，用于控制阻塞，队列中元素个数<2则阻塞
public:
    // 获取元素个数
    int size()
    {
        std::unique_lock<std::mutex> lock(_mutex);
        return _list.size();
    }
    // 判断为空
    bool empty()
    {
        std::unique_lock<std::mutex> lock(_mutex);
        return _list.empty();
    }
    // 阻塞线程
    void wait()
    {
        std::unique_lock<std::mutex> lock(_mutex);
        _cond.wait(lock);
    }
    // 入队数据，并唤醒线程
    void push(const T &data)
    {
        std::unique_lock<std::mutex> lock(_mutex);
        _list.push_back(data);
        _cond.notify_all();
    }
    // 出队数据
    bool pop(T &data)
    {
        std::unique_lock<std::mutex> lock(_mutex);
        if (_list.empty() == true)
        {
            return false;
        }
        data = _list.front();
        _list.pop_front();
        return true;
    }
    // 移除指定的数据
    bool remove(T &data)
    {
        std::unique_lock<std::mutex> lock(_mutex);
        _list.remove(data);
        return true;
    }
};

class matcher
{
private:
    // 三个档次的队列
    // 青铜匹配队列
    match_queue<uint64_t> _q_bronze;
    // 黄金匹配队列
    match_queue<uint64_t> _q_gold;
    // 钻石匹配队列
    match_queue<uint64_t> _q_diamond;
    // 三个队列所对应的线程
    std::thread _th_bronze;
    std::thread _th_gold;
    std::thread _th_diamond;
    room_manager *_rm;
    user_table *_ut;
    online_manager *_om;

private:
    // 线程入口函数
    void handle_match(match_queue<uint64_t> &mq)
    {
        while (1)
        {
            // 1. 判断队列人数是否大于2，<2则阻塞等待
            while (mq.size() < 2)
            {
                mq.wait();
            }
            // 2. 走下来代表人数够了，出队两个玩家
            uint64_t uid1, uid2;
            bool ret = mq.pop(uid1);
            if (ret == false)
            {
                continue;
            }
            ret = mq.pop(uid2);
            if (ret == false)
            {
                this->add(uid1);
                continue;
            }
            // 3. 校验两个玩家是否在线，如果有人掉线，则要吧另一个人重新添加入队列
            wsserver_t::connection_ptr conn1 = _om->get_conn_from_hall(uid1);
            if (conn1.get() == nullptr)
            {
                this->add(uid2);
                continue;
            }
            wsserver_t::connection_ptr conn2 = _om->get_conn_from_hall(uid2);
            if (conn2.get() == nullptr)
            {
                this->add(uid1);
                continue;
            }
            // 4. 为两个玩家创建房间，并将玩家加入房间中
            room_ptr rp = _rm->create_room(uid1, uid2);
            if (rp.get() == nullptr)
            {
                this->add(uid1);
                this->add(uid2);
                continue;
            }
            // 5. 对两个玩家进行响应
            Json::Value resp;
            resp["optype"] = "match_success";
            resp["result"] = true;
            std::string body;
            json_util::serialize(resp, body);
            conn1->send(body);
            conn2->send(body);
        }
    }
    void _th_bronze_entry() { return handle_match(_q_bronze); }
    void _th_gold_entry() { return handle_match(_q_gold); }
    void _th_diamond_entry() { return handle_match(_q_diamond); }

public:
    matcher(room_manager *rm, user_table *ut, online_manager *om)
        : _rm(rm), _ut(ut), _om(om),
          _th_bronze(std::thread(&matcher::_th_bronze_entry, this)),
          _th_gold(std::thread(&matcher::_th_gold_entry, this)),
          _th_diamond(std::thread(&matcher::_th_diamond_entry, this))
    {
        DLOG("游戏匹配模块初始化完毕...");
    }
    bool add(uint64_t uid)
    {
        // 根据玩家分数，判定游戏档次，添加到指定队列中
        // 1.根据用户ID，获取用户信息
        Json::Value user;
        bool ret = _ut->select_by_id(uid, user);
        if (ret == false)
        {
            DLOG("获取玩家 %ld 信息失败", uid);
            return false;
        }
        int score = user["score"].asInt();
        // 2.添加到指定队列中
        if (score < 2000)
        {
            _q_bronze.push(uid);
        }
        else if (score >= 2000 && score < 3000)
        {
            _q_gold.push(uid);
        }
        else
        {
            _q_diamond.push(uid);
        }
        return true;
    }
    bool del(uint64_t uid)
    {
        // 1.根据用户ID，获取用户信息
        Json::Value user;
        bool ret = _ut->select_by_id(uid, user);
        if (ret == false)
        {
            DLOG("获取玩家 %ld 信息失败", uid);
            return false;
        }
        int score = user["score"].asInt();
        // 2.添加到指定队列中
        if (score < 2000)
        {
            _q_bronze.remove(uid);
        }
        else if (score >= 2000 && score < 3000)
        {
            _q_gold.remove(uid);
        }
        else
        {
            _q_diamond.remove(uid);
        }
        return true;
    }
};

#endif